/ BBS in a Box 11 / AMUG BBS in a Box Volume XI (April 1994) (MacWizards).iso / Files / System7 tools / Frontier / AllLevelFileList.sit / allLevelFileList.rsrc / scpt_129

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 01 04 5c 00 02 00 00 | 00 de 00 00 04 4d 00 01 |...\....|.....M..|
|00000010| 02 00 00 0f 06 47 65 6e | 65 76 61 00 00 00 00 00 |.....Gen|eva.....|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 09 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 06 78 00 00 a4 e1 | 35 b4 a4 e5 25 d3 00 00 |...x....|5...%...|
|00000050| 00 30 00 00 ff 76 fd 5d | 01 bd ff 49 00 00 00 00 |.0...v.]|...I....|
|00000060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 6f 6e 20 61 |........|....on a|
|00000080| 6c 6c 4c 65 76 65 6c 46 | 69 6c 65 4c 69 73 74 28 |llLevelF|ileList(|
|00000090| 70 61 74 68 29 0d 09 6f | 6e 20 6d 61 6b 65 74 65 |path)..o|n makete|
|000000a0| 78 74 66 69 6c 65 28 6f | 75 74 6c 69 6e 65 29 0d |xtfile(o|utline).|
|000000b0| 09 09 77 69 6e 64 6f 77 | 2e 6f 70 65 6e 28 6f 75 |..window|.open(ou|
|000000c0| 74 6c 69 6e 65 29 0d 09 | 09 77 69 6e 64 6f 77 2e |tline)..|.window.|
|000000d0| 62 72 69 6e 67 74 6f 66 | 72 6f 6e 74 28 6f 75 74 |bringtof|ront(out|
|000000e0| 6c 69 6e 65 29 0d 09 09 | 6f 70 2e 66 75 6c 6c 65 |line)...|op.fulle|
|000000f0| 78 70 61 6e 64 28 29 0d | 09 09 6f 70 2e 66 69 72 |xpand().|..op.fir|
|00000100| 73 74 73 75 6d 6d 69 74 | 28 29 0d 09 09 66 69 6c |stsummit|()...fil|
|00000110| 65 2e 6e 65 77 28 70 61 | 74 68 2b 22 2e 54 4d 50 |e.new(pa|th+".TMP|
|00000120| 22 29 0d 09 09 66 69 6c | 65 2e 73 65 74 74 79 70 |")...fil|e.settyp|
|00000130| 65 28 70 61 74 68 2b 22 | 2e 54 4d 50 22 2c 27 54 |e(path+"|.TMP",'T|
|00000140| 45 58 54 27 29 0d 09 09 | 77 68 69 6c 65 28 6f 70 |EXT')...|while(op|
|00000150| 2e 67 6f 28 64 6f 77 6e | 2c 31 29 29 0d 09 09 09 |.go(down|,1))....|
|00000160| 66 69 6c 65 2e 77 72 69 | 74 65 6c 69 6e 65 28 70 |file.wri|teline(p|
|00000170| 61 74 68 2b 22 2e 54 4d | 50 22 2c 6f 70 2e 67 65 |ath+".TM|P",op.ge|
|00000180| 74 6c 69 6e 65 74 65 78 | 74 28 29 29 0d 09 09 09 |tlinetex|t())....|
|00000190| 6f 70 2e 67 6f 28 72 69 | 67 68 74 2c 31 29 0d 09 |op.go(ri|ght,1)..|
|000001a0| 09 09 66 69 6c 65 2e 77 | 72 69 74 65 6c 69 6e 65 |..file.w|riteline|
|000001b0| 28 70 61 74 68 2b 22 2e | 54 4d 50 22 2c 63 68 61 |(path+".|TMP",cha|
|000001c0| 72 28 39 29 2b 6f 70 2e | 67 65 74 6c 69 6e 65 74 |r(9)+op.|getlinet|
|000001d0| 65 78 74 28 29 2b 63 68 | 61 72 28 31 33 29 29 0d |ext()+ch|ar(13)).|
|000001e0| 09 09 09 6f 70 2e 67 6f | 28 6c 65 66 74 2c 31 29 |...op.go|(left,1)|
|000001f0| 0d 09 6f 6e 20 6c 69 73 | 74 66 69 6c 65 73 28 66 |..on lis|tfiles(f|
|00000200| 6f 6c 64 65 72 29 0d 09 | 09 66 69 6c 65 6c 6f 6f |older)..|.fileloo|
|00000210| 70 28 66 20 69 6e 20 66 | 6f 6c 64 65 72 29 0d 09 |p(f in f|older)..|
|00000220| 09 09 69 66 20 66 69 6c | 65 2e 69 73 66 6f 6c 64 |..if fil|e.isfold|
|00000230| 65 72 28 66 29 0d 09 09 | 09 09 6d 73 67 28 22 77 |er(f)...|..msg("w|
|00000240| 6f 72 6b 69 6e 67 20 6f | 6e 20 66 6f 6c 64 65 72 |orking o|n folder|
|00000250| 20 22 2b 66 29 0d 09 09 | 09 09 6c 69 73 74 66 69 | "+f)...|..listfi|
|00000260| 6c 65 73 28 66 29 0d 09 | 09 09 65 6c 73 65 0d 09 |les(f)..|..else..|
|00000270| 09 09 09 69 66 28 66 69 | 6c 65 2e 66 69 6c 65 66 |...if(fi|le.filef|
|00000280| 72 6f 6d 70 61 74 68 28 | 66 29 21 3d 22 61 6c 6c |rompath(|f)!="all|
|00000290| 4c 65 76 65 6c 46 69 6c | 65 4c 69 73 74 22 29 0d |LevelFil|eList").|
|000002a0| 09 09 09 09 09 6f 70 2e | 69 6e 73 65 72 74 28 66 |.....op.|insert(f|
|000002b0| 69 6c 65 2e 66 69 6c 65 | 66 72 6f 6d 70 61 74 68 |ile.file|frompath|
|000002c0| 28 66 29 2c 64 6f 77 6e | 29 0d 09 09 09 09 09 6f |(f),down|)......o|
|000002d0| 70 2e 69 6e 73 65 72 74 | 28 66 2c 72 69 67 68 74 |p.insert|(f,right|
|000002e0| 29 0d 09 09 09 09 09 6f | 70 2e 67 6f 28 6c 65 66 |)......o|p.go(lef|
|000002f0| 74 2c 31 29 0d 09 09 09 | 09 09 63 6f 75 6e 74 2b |t,1)....|..count+|
|00000300| 2b 0d 09 66 6f 6c 64 65 | 72 20 3d 20 66 69 6c 65 |+..folde|r = file|
|00000310| 2e 66 6f 6c 64 65 72 66 | 72 6f 6d 70 61 74 68 20 |.folderf|rompath |
|00000320| 28 70 61 74 68 29 0d 09 | 6d 73 67 28 22 42 45 47 |(path)..|msg("BEG|
|00000330| 49 4e 2e 20 20 28 55 73 | 69 6e 67 20 66 6f 6c 64 |IN.  (Us|ing fold|
|00000340| 65 72 20 22 2b 66 6f 6c | 64 65 72 2b 22 29 22 29 |er "+fol|der+")")|
|00000350| 0d 09 66 69 6c 65 6c 69 | 73 74 3d 66 6f 6c 64 65 |..fileli|st=folde|
|00000360| 72 2b 22 4c 69 73 74 20 | 6f 66 20 66 69 6c 65 73 |r+"List |of files|
|00000370| 22 0d 09 6e 65 77 28 6f | 75 74 6c 69 6e 65 74 79 |"..new(o|utlinety|
|00000380| 70 65 2c 40 70 65 6f 70 | 6c 65 2e 5b 75 73 65 72 |pe,@peop|le.[user|
|00000390| 2e 69 6e 69 74 69 61 6c | 73 5d 2e 66 69 6c 65 6c |.initial|s].filel|
|000003a0| 69 73 74 29 0d 09 77 69 | 6e 64 6f 77 2e 6f 70 65 |ist)..wi|ndow.ope|
|000003b0| 6e 28 40 70 65 6f 70 6c | 65 2e 5b 75 73 65 72 2e |n(@peopl|e.[user.|
|000003c0| 69 6e 69 74 69 61 6c 73 | 5d 2e 66 69 6c 65 6c 69 |initials|].fileli|
|000003d0| 73 74 29 0d 09 77 69 6e | 64 6f 77 2e 62 72 69 6e |st)..win|dow.brin|
|000003e0| 67 74 6f 66 72 6f 6e 74 | 28 40 70 65 6f 70 6c 65 |gtofront|(@people|
|000003f0| 2e 5b 75 73 65 72 2e 69 | 6e 69 74 69 61 6c 73 5d |.[user.i|nitials]|
|00000400| 2e 66 69 6c 65 6c 69 73 | 74 29 0d 09 6f 70 2e 73 |.filelis|t)..op.s|
|00000410| 65 74 6c 69 6e 65 74 65 | 78 74 28 22 20 20 20 20 |etlinete|xt("    |
|00000420| 20 20 20 20 20 46 69 6c | 65 73 20 69 6e 20 22 2b |     Fil|es in "+|
|00000430| 66 6f 6c 64 65 72 29 0d | 09 63 6f 75 6e 74 3d 30 |folder).|.count=0|
|00000440| 0d 09 6c 69 73 74 66 69 | 6c 65 73 28 66 6f 6c 64 |..listfi|les(fold|
|00000450| 65 72 29 0d 09 6d 73 67 | 28 22 44 4f 4e 45 2e 20 |er)..msg|("DONE. |
|00000460| 28 22 2b 63 6f 75 6e 74 | 2b 22 20 66 69 6c 65 73 |("+count|+" files|
|00000470| 20 6c 69 73 74 65 64 29 | 22 29 0d 09 6f 70 2e 73 | listed)|")..op.s|
|00000480| 6f 72 74 28 29 0d 09 6f | 70 2e 66 75 6c 6c 63 6f |ort()..o|p.fullco|
|00000490| 6c 6c 61 70 73 65 28 29 | 0d 09 6d 61 6b 65 74 65 |llapse()|..makete|
|000004a0| 78 74 66 69 6c 65 28 40 | 70 65 6f 70 6c 65 2e 5b |xtfile(@|people.[|
|000004b0| 75 73 65 72 2e 69 6e 69 | 74 69 61 6c 73 5d 2e 66 |user.ini|tials].f|
|000004c0| 69 6c 65 6c 69 73 74 29 | 0d 80 00 00 00 00 00 80 |ilelist)|........|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000510| 00 00 00 00 00 00 00 80 | 00 00 00 00 00 80 00 00 |........|........|
|00000520| 00 00 00 80 00 00 00 00 | 00 80 00 00 00 00 00 80 |........|........|
|00000530| 00 00 00 00 00 80 00 00 | 00 00 00 80 00 00 00 00 |........|........|
|00000540| 00 80 00 00 00 00 00 80 | 00 00 00 00 00 80 00 00 |........|........|
|00000550| 00 00 00 80 00 00 00 00 | 00 80 00 00 00 00 00 80 |........|........|
|00000560| 00 00 00 00 00 80 00 00 | 00 00 00 80 00 00 00 00 |........|........|
|00000570| 00 80 00 00 00 00 00 80 | 00 00 00 00 00 80 00 00 |........|........|
|00000580| 00 00 00 80 00 00 00 00 | 00 80 00 00 00 00 00 80 |........|........|
|00000590| 00 00 00 00 00 80 00 00 | 00 00 00 80 00 00 00 00 |........|........|
|000005a0| 00 84 00 00 00 00 00    |                         |....... |        |
+--------+-------------------------+-------------------------+--------+--------+